



grafica %= 74

load (sprintf('video_%g', grafica))


% a es el groundtruth 
%a2 es el estimado



ix = 1:3:length(a);    
subplot(3,1,1)
plot(a(ix,1), a(ix,2)*180/pi, 'r')
hold on
plot(a(ix,1), a2(ix,2)*180/pi)
grid on
hold off
title (sprintf('video: video %03g', grafica))
ylabel 'Pitch [^o]'
legend ('Estimated pose', 'Groundtruth pose')

subplot(3,1,2)
plot(a(ix,1), a(ix,3)*180/pi, 'r')
hold on
plot(a(ix,1), a2(ix,3)*180/pi)
grid on
hold off
ylabel 'Yaw [^o]'
title 'Yaw [^o]'
legend ('Estimated pose', 'Groundtruth pose')

subplot(3,1,3)
plot(a(ix,1), a(ix,4)*180/pi, 'r')
hold on
plot(a(ix,1), a2(ix,4)*180/pi)
grid on
hold off
ylabel 'Roll [^o]'
title 'Roll [^o]'
legend ('Estimated pose', 'Groundtruth pose')